(suspend-hook, suspend-resume-hook): New defvars.

diff --git a/lisp/subr.el b/lisp/subr.el
index d344754c34b10349c17aa37e758dded68d26d8b9..a3d6554e354e6781f942886f899350dc7862b4f6 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -836,6 +836,12 @@ If MESSAGE is nil, instructions to type EXIT-CHAR are displayed there."
 ;; Give it a global value to avoid compiler warnings.
 (defvar font-lock-defaults nil)
 
+(defvar suspend-hook nil
+  "Normal hook run by `suspend-emacs', before suspending.")
+
+(defvar suspend-resume-hook nil
+  "Normal hook run by `suspend-emacs', after Emacs is continued.")
+
 ;; Avoid compiler warnings about this variable,
 ;; which has a special meaning on certain system types.
 (defvar buffer-file-type nil